home *** CD-ROM | disk | FTP | other *** search
Gui4CLI script | 1999-11-24 | 492 b | 38 lines |
- G4C - Shows given icon
-
- WinBig -1 -1 200 100 IconView
- WinType 01000001
- resinfo 8 640 256
-
- BOX 0 0 0 0 out button
-
- xOnLoad icon
- guiopen icon.gc $icon
-
- xOnReload icon
- delay 20
- extract icon file name
- setwintitle icon.gc '$name'
- ChangeIcon icon.gc 1 -1 -1 $icon
-
- xOnOpen icon
- extract icon file name
- setwintitle icon.gc '$name'
- ChangeIcon icon.gc 1 -1 -1 $icon
-
- xOnClose
- guiquit icon.gc
-
- xOnRMB
- guiquit icon.gc
-
- xOnInactive
- guiquit icon.gc
-
- xIcon 10 10 ""
- attr resize 0000
- GadID 1
-
-
-
-